home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CU Amiga Super CD-ROM 4
/
CU Amiga Magazine's Super CD-ROM 04 (1996)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1996-11].iso
/
magazine
/
psion
/
utils
/
datafile.lzx
/
datafile.opa
/
datafile.txt
next >
Wrap
Text File
|
1994-10-14
|
8KB
|
486 lines
OPLObjectFile**
LOC::A:\OPL\DATAFILE.OPL
datafile.DBF
\DAT\
FIND1$
FIND$
REPLACE$
FIELD%
NFIELDS%
LABEL%
POSLIST%
LAST%
LASTPOS%
FONT%
STYLE%
FSTART%
FEND%
CASE%
STATWN%
STATWIN
PROCLB
KGET%
RECORDPR
LISTPR
Field
M:\DAT
+/(E)End (R)Replace (S)Skip (A)All
LPHWT
not foundK
LISTPR
LAST%
FIND1$
POSLIST%
LASTPOS%
FONT%
STYLE%
POSLIST%
FIELD%
FIND1$
LAST%
HOJO8
8\`[.
Find:
FONT%
STYLE%
LABEL%
FIND1$
LAST%
Find:
GETHELP
STATWIN
noamqecuipdkrftjslzbx
+ RTIDMWEFZ
OC`[
File+
New fileOn+ Open fileOo+
Save AsOa+
Merge inOm
Edit+
Add recordOq+
Edit recordOeh+
Copy recordOc+
Cut recordOu+
Insert recordOi+
Append recordOp+
Delete recordOdh+
Clipboard editOk
Search+
Find previousOr+ Find nextOf+
Find & ReplaceOR+
Find criteriaOt+
Extract recordsOTh+
Jump toOjh
Data+
Sort recordsOsh+
Insert fieldOI+
Delete fieldOD+
Move fieldOM+
Swap fieldsOWh+
Edit labelsOE
Display+
Label showOl+
Font selectOF+
Zoom inOz+
Zoom outOZ
Special+
AboutOb+
ExitOx
OZ4[2
procuO
proclO
procu
procl
Help: Dataproc(
Browsing the data(
File handling(
Editing records(
Finding records(
Sorting records(
Manipulating fields(
Display functions(
Help: Browsing the data(
+,Use cursor up/down to scroll through records
++Use Pg Up, Pg Dn, Home, End to step through
the records rapidly.
Tab to see one complete record.
+&Move through records as for list view.
+#Tab again to return to record list.
Help: File handling(
-N to open a new file,K
+& any open file is saved first.
-O to open an existing file.K
+& any open file is saved first.
+(-A to save current file with a new name.K
+&-M to merge in data from another file,K
+6 the records are added to the end of the file.
Help: Editing records - 1(
-Q to add a new recordK
+ to the end of the file.
+(-E to edit a record, then insert, appendK
+2 or copy edited record from the clipboard.
+%-C to copy a record to the clipboard,K
+. the record is unaffected in the file.
+$-U to cut a record to the clipboard,K
+) the record is cut from the file.
Help: Editing records - 2(
+%-I to insert clipboard to the currentK
position in the file.
+!-P to append the clipboard to theK
end of the file.
+$-D to delete a record from the file,K
+3 the record is not copied to the clipboard.
-L to edit the clipboard orK
to view the clipboard.
Help: Finding records - 1(
+,Just type the first characters of the record
+*for which you are searching and it will be
displayed on the top line.
++If the characters are not found the display
+%will switch back to the first record.
+!Use Esc to delete the Find string
++ Delete to delete 1 char at a time.
+,Alternatively use the Search menu options...
Help: Finding records - 2(
+&-F to search forward for a string fromK
the current position.
+'-R to search bacwards for a string fromK
the current position.
-T to set search criteria.K
++-Shift-T to Extract records to another fileK
+' using the search criteria set.
+(-J to jump to a specified record number.K
Help: Sorting records(
+'-S to sort file into alphanumeric orderK
of first field.
+-Press Esc to abort the sort, the records will
be left partly sorted.
+(Records are displayed as they are sorted
+, and the number left to be sorted is shown.
+-Note - sort time increases with the square of
+& the number of records!
Help: Manipulating fields(
+0-Shift-I to insert a new field into all records.K
+,-Shift-D to delete a field from all records.K
+8Take great care when using these facilities as they have
+) irreversible effects on the whole file.
+<Both functions contain secondary warnings of impending doom!
+(-Shift-M to move a field in all records.K
++-Shift-W to swap two fields in all records.K
Help: Display functions(
+!-L to show labels in record view.K
+,-Shift-F to select a display font and style.K
+8-Z to zoom in to a larger font using the selected style.K
+'-Shift-Z to zoom out to a smaller font.K
+-Control-Menu to alter status window as usual.
RECORDPR
LISTPR
STATWN%
FONT%
STYLE%
FIND1$
LISTPR1
M:\dat\.dbf
Create new file
File:O
Enter Field Labels
LISTPR1
+ \DAT\.dbf
+ Open file
File:OH
W7[2
+ \DAT\.dbf
Save as
File:OS
Use new file+
No,Yes
openedK
savedK
LISTPR1
LAST%
+ \DAT\.dbf
Merge data from
File:OH
File opened
Ready to merge in this data?
NoON+
YesOY
Oy@[.
RECORDPR
LISTPR
LAST%
POSLIST%
Add new record to end of file:
New record appended
RECORDPR
LISTPR
LAST%
LASTPOS%
POSLIST%
FONT%
STYLE%
Edit record no.
+(Add the edited record to the file using:
AppendOP+
InsertOI+ ClipboardOC
Inserting Record...(
Record Inserted
Oc@[/
Record cut to clipboard
Record Copied
RECORDPR
LISTPR
LAST%
+ Cut current record to clipboard?
1st Field:+
NoON+
YesOY
W7Oy@[
Record cut to clipboard
RECORDPR
LISTPR
LAST%
FONT%
STYLE%
+%Insert clipboard at current position?
1st Field:O
NoON+
YesOY
W7Oy@[9
Inserting Record...(
Record Inserted
RECORDPR
LISTPR
LAST%
LASTPOS%
POSLIST%
+'Append clipboard record to end of file?
1st Field:O
NoON+
YesOY
W7Oy@[
RECORDPR
LISTPR
LAST%
Delete current record?
+'WARNING: record not saved to clipboard.
1st Field:+
NoON+
YesOY
W7Oy@[7
Record Deleted
Clipboard edit/view:
RECORDPR
LISTPR
FIND$
FSTART%
FEND%
CASE%
POSLIST%
LASTPOS%
FIELD%
+$Find text in any previous data field(
Find O
LPHWT
in record 1 or not foundK
RECORDPR
LISTPR
FIND$
FSTART%
FEND%
CASE%
LASTPOS%
FIELD%
+"Find text in any future data field(
Find O
LPHWT
not foundK
RECORDPR
LISTPR
PROCLS
FIND$
REPLACE$
FSTART%
FEND%
CASE%
LASTPOS%
POSLIST%
FIELD%
+.Find and Replace text in any future data field(
Find:
Replace:
LPHWT
not foundK
OR@`[
OS@`[
OA@`[
found, K
K+ replacedK
+ Do you want to sort the records?
NoON+
YesOY
FSTART%
FEND%
CASE%
Set search criteria:
Start field+
1,2,3,4,5,6,7,8
+ End field+
1,2,3,4,5,6,7,8
Case sensitive+
No,Yes
Search at start of string+
No,Yes
Start field after End field!
LISTPR1
FIND$
FSTART%
FEND%
CASE%
+ \DAT\.dbf
Extract records to a file
+*Find records using the search criteria setO
+%and copy the records found to a file.O
File:O
Find string:
Use new file?+
No,Yes
+#File already exists, do you want to
+ Append toOA+ OverwriteOO
Oa@[4
LPHWT
not foundK
LPHWT
openedK
savedK
LASTPOS%
Jump to a record number(
Record no:
FONT%
STYLE%
Sort records
Sort field no. (1-8):O
Sorting Records...(
Sort aborted
RECORDPR
LISTPR
LAST%
NFIELDS%
+)Insert new new blank field in all records
Insert at field no. (1-7):O
+!Insert field will lose last field
Record no.
8th Field:+
+ Continue?O
NoON+
YesOY
W7On@[
{I1[,
New field inserted
RECORDPR
LISTPR
LAST%
Delete field from all records
Delete field no. (1-8):O
Delete field from all records
Field no.
Label:
+ Continue?O
NoON+
YesOY
W7Oy@[f
RECORDPR
LISTPR
LAST%
Move a field in all records
From field no. (1-8):O
To field no. (1-8):O
Move a field in all records
From field no.
To field no.
+ Continue?O
NoON+
YesOY
W7Oy@[
RECORDPR
LISTPR
LAST%
Swap two fields in all records
Field no. (1-8):O
Field no. (1-8):O
Swap two fields in all records
Field no.
Field no.
+ Continue?O
NoON+
YesOY
W7Oy@[T
+&Labels not implemented in this version
+&Labels not implemented in this version
RECORDPR
LISTPR
FONT%
STYLE%
Set font and style
Font+oS3 normal,S3 bold,S3 digits,Mono 8,Roman 8,Roman 11,Roman 13,Roman 16,Swiss 8,Swiss 11,Swiss 13,Swiss 16,Mono 6
+ Underline+
No,Yes
Bold+
No,Yes
Italic+
No,Yes
Inverse+
No,Yes
Double height+
No,Yes
Mono+
No,Yes
LPHO
FONT%
O 0\[
FONT%
O 0\[
+)DATAFILE Version 2.4 for PSION Series 3a
+'Copyright
September 1994, Gordon DyerO
+1This version is limited to 8 fields of 256 chars.O
Saving file...
DATAFILE
LISTPR1U
LISTPR
RECORDPR
KGET%m
GETHELP
STATWIN
FSETz"
PROCLN
PROCLO9$
PROCLA
PROCLM
PROCLQ
PROCLE
PROCLC
PROCLUb/
PROCLI
PROCLPf2
PROCLD
PROCLK
PROCLR!5
PROCLF
PROCUR
PROCLT
PROCUT
PROCLJ
PROCLS`B
PROCUI
PROCUD
PROCUM_K
PROCUW
PROCUE
PROCLL
PROCUFDR
PROCLZ(T
PROCUZ
PROCLB
PROCLXQV